home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Workbench Design
/
WB Collection.iso
/
workbench werkzeuge
/
appicon tools
/
newtrashcan
/
install
/
install_2.1+
/
deutsch
next >
Wrap
Text File
|
1996-04-07
|
1KB
|
39 lines
; NewTrashcan Installer
(set handdir
(askdir (prompt "Verzeichnis für den Handler wählen")
(default "sys:WBStartup")
(help @askdir-help)))
(copyfiles (source "//WBStartup/")
(dest handdir)
(pattern "#?")
(infos))
(set dirname
(askdir (prompt "Verzeichnis für den Voreinsteller wählen")
(default "sys:Prefs")
(help @askdir-help)))
(copyfiles (source "//Prefs/")
(dest dirname)
(pattern "#?")
(infos))
(set locale
(getassign "Locale" "a"))
(if locale
( (set sloc (cat "//Locale/" @language "/"))
(set dloc (cat "Locale:catalogs/" @language "/"))
(copyfiles (source sloc)
(dest dloc)
(pattern "#?"))))
(if (askbool (help @askbool-help)
(prompt "Soll der Handler jetzt gestartet werden?")
(choices "JA" "NEIN"))
((set nt (cat "run " handdir "/NewTrashcan install"))
(run nt))
)
(exit "Fertig!\n" "NewTrashcan wird beim nächsten Booten immer gestartet.")